Top 10k strings from Study Maths 2 - 9-13 years - Glass Design (1983)(Scisoft).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /

Back to the directory listing

   3 glass     
   2 z$="C")+(24
   2 z$="A")+(12
   2 title page
   2 ;"GLASS DESIGN"
   2 ;"** GLASS DESIGN **"
   2 /segments)
   2 )-p(points-1
   2 ''"A 6 steps"'"B 12 steps"'"C 18 steps"'"D 24 steps"
   1 z$="Glass Design":
   1 z$="B")+(18
   1 z$="A")+(18
   1 y=y+(z$="7"
   1 x=x+(z$="8"
   1 segments=12
   1 segments=(6
   1 resolution=20
   1 points=points+1
   1 p(points,2
   1 p(points,1
   1 instructions
   1 draw shape
   1 design side view
   1 delayed input
   1 change lines and points
   1 change colours
   1 a$(n)>"9")
   1 Glass Designv
   1 By P.W.Cooke
   1 ;points;" point"+("s"
   1 ;"type in paper colour (0-7) ";
   1 ;"type in ink colour (0-7)   ";
   1 ;"t9876543210123456789t"
   1 ;"of vertical lines"
   1 ;"You need to design a shape"''"before you can view it.":
   1 ;"YOU CANT HAVE PAPER AND INK     COLOURS THE SAME !!             ":
   1 ;"What angle of tilt do you want  to view at?"'"Type in any angle between 0 and 90 degrees and press 
   1 ;"Use cursor keys to move pointer 
   1 ;"This program allows you to"
   1 ;"The two variables you can changeare"
   1 ;"STILL LOADING";
   1 ;"Paper ";paper;"    ink ";ink:
   1 ;"LEAVE TAPE RUNNING":
   1 ;"Change colours"
   1 ;"6 Stop the program"
   1 ;"5 Set colours"
   1 ;"4 See instructions"
   1 ;"3 Change resolution/number";
   1 ;"2 View shape"
   1 ;"1 Design new shape"
   1 ;"** G L A S S **"
   1 ;"                                ";:
   1 /resolution
   1 *p(points-1
   1 *n*p(points-1
   1 *n*(p(points,1
   1 *(p(points,2
   1 );" plotted"
   1 ),segments)),tilty*(
   1 ),segments))
   1 ),n)+tiltx*p(1
   1 ),n)),tilty*(
   1 ),n))+tiltx*((p(m,2
   1 )+tiltx*p(n,2
   1 )),tilty*(
   1 (a$(n)<"0"
   1 ''angle;" degrees"
   1 '"no of vertical lines now ";lines
   1 '"no of horizontal steps now ";segments
   1 '"To make a 3-D shape you must"
   1 '"It will then ask what angle you"
   1 '"2 no of vertical lines                          now ";lines
   1 '"1 no of steps in horizontal       direction     now ";segments
   1 "with rotational symmetry."
   1 "want the shape tilted at and"
   1 "of your design."
   1 "give the computer the side view"
   1 "draw a 3-D representation of the"
   1 "design 3-dimensional objects"
   1 "Change no of vertical lines"
   1 "Change no of horizontal steps"
   1 "(for example cones or cylinders)"
   1  to start again                
   1  to see the 3-D shape"
   1  to plot next point            
   1  to finish."
   1  to continue"
   1  Scisoft 1983"
   1   1983                                       
   1     GLASS DESIGN                   
   1